home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
ab20
/
ab20_archive
/
datacomm
/
xpr
/
xprxmodem-34.3.lzh
/
callback.asm
next >
Wrap
Assembly Source File
|
1990-07-13
|
2KB
|
54 lines
*
* The following functions setup the proper registers for the call-back
* functions.
*
xdef _callad
_callad:
movea.l 8(sp),a0 ; Second argument goes in a0
move.l 12(sp),d0 ; Third argument goes in d0
* Now this is a trick to avoid using another register.
* Charlie taught me this...
move.l 4(sp),-(sp) ; First argument is function
rts
xdef _calladda
_calladda:
movea.l 8(sp),a0 ; Second argument goes in a0
move.l 12(sp),d0 ; Third argument goes in d0
move.l 16(sp),d1 ; Fourth argument goes in d1
movea.l 20(sp),a1 ; Fifth argument goes in a1
move.l 4(sp),-(sp) ; First argument is function
rts
xdef _calla
_calla:
movea.l 8(sp),a0 ; Second argument goes in a0
move.l 4(sp),-(sp) ; First argument is function
rts
xdef _calld
_calld:
move.l 8(sp),d0 ; Second argument goes in d0
move.l 4(sp),-(sp) ; First argument is function
rts
xdef _callaa
_callaa:
movea.l 8(sp),a0 ; Second argument goes in a0
movea.l 12(sp),a1 ; Third argument goes in a1
move.l 4(sp),-(sp) ; First argument is function
rts
xdef _calladd
_calladd:
move.l 8(sp),a0 ; Second argument goes in a0
move.l 12(sp),d0 ; Third argument goes in d0
move.l 16(sp),d1 ; Fourth argument goes in d1
move.l 4(sp),-(sp) ; First argument is function
rts
* Could have added any other functions needed for other call-backs.
* Could have written a fancier single one... Could've...